www.gusucode.com > 基于matlab编程蒙特卡罗仿真设计源码程序 > 基于matlab编程蒙特卡罗仿真设计源码程序/第五讲 蒙特卡洛方法的应用/liti1.m

    function liti1(n,p,mm)
pro=zeros(1,mm);
randnum = binornd(n,p,1,mm)
a=0;
for i=1:mm
    a=a+randnum(1,i);
    pro(i)=a/i;
end    
pro=pro
num=1:mm;
plot(num,pro)